home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / FAGOR.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  121 lines
  1. name Fagor
  2.  
  3. O >4
  4. N >4
  5. G >2
  6. X ->3.>4
  7. Y ->3.>4
  8. Z ->3.>4
  9. I ->3.>4
  10. J ->3.>4
  11. Q ->3.>4
  12. R ->3.>4
  13. P ->3.>4
  14. F >32
  15. K ->3.>4
  16. H >2
  17. D >2
  18. T >2
  19. M >2
  20. S >4
  21.  
  22. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  23.  
  24. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  25.  
  26. HCode X                               # X or X U  'Horizontal char.       
  27. VCode Y                               # Y or Y V  'Vertical char.         
  28. Dcode Z                               # Depth char.                       
  29. FeedCode F                            # Feed rate char.                   
  30.  
  31. Comment ( )                           # Begin End comment char.           
  32.  
  33. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  34. Coolant 8 9 7                         # On, Off & Mist m codes            
  35. DComp 41 42 40                        # Left, Right & Cancel m codes      
  36. LComp 43 49                           # On & Off codes                    
  37.  
  38. Feed G1                             # Linear move                       
  39. Rapid G0                            # Rapid positioning word            
  40. Cw G2                               # Circular move clockwise           
  41. Ccw G3                              # Circular move counter clockwise   
  42.  
  43. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  44.  
  45. Work G                                # Work offset register              
  46.  
  47. Spaces? Y                             # Y or N  'Spaces between words     
  48.  
  49. Incremental? N                        # Y or N  'Inc or abs output        
  50. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  51. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  52. CtrCode I J                           # I J or R or I J K L               
  53. Helical? N
  54.  
  55. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  56.  
  57. Drill                                 # Drilling canned/manual cycle      
  58. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  59. end cancel
  60.  
  61. Peck                                  # Pecking canned/manual cycle       
  62. G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
  63. end cancel
  64.  
  65. Tap                                   # Tapping canned/manual cycle       
  66. G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  67. end cancel
  68.  
  69. LTap                                  # Left handed tapping cycle         
  70. G74 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  71. end cancel
  72.  
  73. Ream                                  # Reaming canned/manual cycle       
  74. G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  75. end cancel
  76.  
  77. Bore                                  # Boring canned/manual cycle        
  78. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  79. end cancel
  80.  
  81. Back                                  # Back boring canned/manual cycle   
  82. G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  83. end cancel
  84.  
  85. Cancel                                # Cancel a canned/manual cycle      
  86. G80
  87. end
  88.  
  89. StartCode                             # Start of the program              
  90. O[Program#]
  91. end
  92.  
  93. 1stToolChange                         # First tool change                 
  94. G0 X[h] Y[V]
  95. Z[VClear] M[Direct] S[Speed]
  96. End
  97.  
  98. Infeed                                # Enable cutter comp                
  99. G1 Z[D] F[Plunge]
  100. G[Side] X[H] Y[V] D[DComp] F[FRate]
  101. end
  102.  
  103. Outfeed                               # Disable cutter comp               
  104. G1 G40 X[H] Y[V]
  105. Z[D]
  106. end
  107.  
  108. ToolChange                            # Secondary tool changes            
  109. G0 Z[VClear]
  110. M30 T[Tool]
  111. G0 X[H] Y[V]
  112. Z[VCLear] M[Direct] S[Speed]
  113. End
  114.  
  115. EndCode                               # End of the program                
  116. G0 Z[VClear]
  117. X0 Y0 M30
  118. End
  119.  
  120.  
  121.